function answer = ejer3()

		fprintf('\n________________________________________________\n');
		e = 0.00001;
		m = 100; %numero maximo de iteraciones permitidas
		x0 = 2;
		
		fprintf('\nMetodo de Newton para la funcion x^2-1\n');
		fprintf('tolerancia de error: %f\n', e);
		fprintf('valor inicial proximo a la raiz: %f\n', x0);
      
		[hx, hf] = newton('fun',x0,e,m);
     
		fprintf('\nRESULTADOS\n');

		fprintf('\nNumero de iteraciones: %d\n', length(hx));
      
		fprintf('Aproximaciones a la raiz: ');
		hx
		fprintf('raiz: %f\n',hx(end));

		fprintf('Imagenes de las aproximaciones a la raiz: ');
		hf
		fprintf('imagen de raiz: %f\n',hf(end));
		fprintf('\n________________________________________________\n');
		   
      
endfunction   
